From: Stefan Monnier Date: Tue, 25 Oct 2011 12:33:31 +0000 (-0400) Subject: * comint.el (comint-get-old-input-default): Fix thinko in last change. X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~324^2~1860 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=22017c3fbcc756f60eed5142e9e93729b820f977;p=emacs.git * comint.el (comint-get-old-input-default): Fix thinko in last change. --- diff --git a/lisp/comint.el b/lisp/comint.el index dc3cdd9fa7a..b91b82adb21 100644 --- a/lisp/comint.el +++ b/lisp/comint.el @@ -2152,7 +2152,7 @@ If `comint-use-prompt-regexp' is non-nil, then return the current line with any initial string matching the regexp `comint-prompt-regexp' removed." (let (bof) - (if (and comint-use-prompt-regexp + (if (and (not comint-use-prompt-regexp) ;; Make sure we're in an input rather than output field. (null (get-char-property (setq bof (field-beginning)) 'field))) (field-string-no-properties bof)